-- background: 6406 from stack: in.11_89
-- bmap block id: 6676
-- flags: 0000
-- background id: 0
-- name: Directory
----- HyperTalk script -----
on savethis
  push cd
  visual dissolve very slow to white
  visual dissolve very slow to black
  go cd "BLACK2"
  visual dissolve
  go cd "brought by"
  wait 120
  visual dissolve
  go cd "BLACK2"
  go cd "Credit"
  play "firebird"
  visual dissolve
  go stack "ali baa baa"
end savethis



-- part 2 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=117 top=74 right=326 bottom=499
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 0
-- text size: 12
-- style flags: 256
-- line height: 42
-- part name: stack list
----- HyperTalk script -----
on mouseUp
  get the short name of this cd
  if it is "stacks"
  then
  get clickLine()
  put line it of me into whatget
  select line it of me
  if the selection is not empty
  then
  push cd
  if the selection contains "ResEdit"
  then
  open "ResEdit ver 1.2b2"
else
  visual dissolve slow to white
  visual dissolve slow to black
  go stack whatGet
end if
end if
end if
end mouseUp


-- part 3 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=465 top=296 right=331 bottom=489
-- title width / last selected line: 0
-- icon id / first selected line: 6721 / 6721
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Return
----- HyperTalk script -----
on mouseUp
  visual iris close to grey
  visual iris open
  pop cd
end mouseUp



-- part 4 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=439 top=303 right=323 bottom=465
-- title width / last selected line: 0
-- icon id / first selected line: 4465 / 4465
-- text alignment: 1
-- font id: 3
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: Index
----- HyperTalk script -----
on mouseUp
  push cd
  visual barn door close to black
  visual barn door open
  go cd "LImacSTACK index"
end mouseUp